home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Various
/
S.N.A.G. Disk of the Month 91-03 (1991)(Southern Nevada Amiga Group)(PD).zip
/
S.N.A.G. Disk of the Month 91-03 (1991)(Southern Nevada Amiga Group)(PD).adf
/
PIV
/
glue.a
< prev
next >
Wrap
Text File
|
1991-03-29
|
528b
|
32 lines
; glue.a
;
; for PIV
;
; (c) Copyright 1991 J.E.Hanway
;
; glue routine for calling original AutoRequest
; for SAS asm.
;
; $Id: glue.a,v 1.1 91/03/13 22:35:40 jeh Exp $
;
; $Log: glue.a,v $
; Revision 1.1 91/03/13 22:35:40 jeh
; Initial revision
;
;
CSECT text
xref _IntuitionBase
xref _real_AutoRequest
xdef _call_AutoRequest
_call_AutoRequest:
movem.l a5-a6,-(a7)
movea.l _IntuitionBase(a4),a6
movea.l _real_AutoRequest(a4),a5
jsr (a5)
movem.l (a7)+,a5-a6
rts
end